BannedBooks

An Analysis of the PEN America’s Index of School Book Bans from July 1, 2021 to June 30, 2022

The Data

Data Comes from PEN America’s Index of School Book Bans

Image From The State News

Show the code

books %>%
  mutate(Author = as.factor(Author), Title = as.factor(Title), `Type of Ban` = as.factor(`Type of Ban`), State = as.factor(State), District = as.factor(District), `Date of Challenge/Removal` = as.factor(`Date of Challenge/Removal`), `Origin of Challenge` = as.factor(`Origin of Challenge`)) %>%
  select(Author, Title, `Type of Ban`, State, District, `Date of Challenge/Removal`, `Origin of Challenge`) %>%
  datatable(filter= "top", options = list(pageLength = 5, autoWidth = TRUE), rownames=FALSE)

Show the code

topbooks %>%
  select(image = image_url, Title, Author, numTimesBanned) %>%
  gt()%>%
  gt_img_rows(columns = image,img_source="local", height = 50)%>%
  tab_header(title = "The Most Banned Books from July 2021 - June 2022") %>%
  cols_label(
    Title = "Book Title",
    image = "Book Cover",
    Author = "Author",
    numTimesBanned = "Total Number of Bans"
  )

The Most Banned Books from July 2021 - June 2022
Book Cover	Author	Total Number of Bans
Gender Queer: A Memoir
	Kobabe, Maia	41
All Boys Aren't Blue
	Johnson, George M.	29
Out of Darkness
	Pérez, Ashley Hope	23
The Bluest Eye
	Morrison, Toni	22
Lawn Boy
	Evison, Jonathan	17
The Hate U Give
	Thomas, Angie	17
The Absolutely True Diary of a Part-Time Indian
	Alexie, Sherman	16